home *** CD-ROM | disk | FTP | other *** search
/ Aplicaciones Windows / Aplicaciones Windows.iso / Negocios / HSS640.ZIP / INST2C.FIL < prev    next >
Text File  |  1996-11-01  |  3KB  |  145 lines
  1. ' ***********************************************
  2. ' * NOTICE - DO NOT MODIFY THIS FILE IN ANY WAY *
  3. ' ***********************************************
  4. ' Copyright 1996, Grumpyware (r)
  5. ' January, 1996
  6. BACKGROUND 16
  7. SHADOW ON
  8. BORDER 2
  9. WINOPEN 00 01 31
  10. "                          Home Sales System                           "
  11. WINOPEN 44 07 31
  12. "      Install Program       "
  13. WINOPEN 44 12 79
  14. "                            "
  15. "       Grumpyware (r)       "
  16. "                            "
  17. "          Presents          "
  18. "                            "
  19. "            The             "
  20. "     Home Sales System      "
  21. "         Ver 6.40           "
  22. "                            "
  23. "   (All Rights Reserved)    "
  24. :PROMPT
  25. SPACE 1536
  26. DRIVE C 04 07 31 15 04 13 79
  27. PATH \HSS60 04 07 31 15 04 13 79
  28. EXIST ~1~2\*.*
  29. JUMP.NO UNPACK
  30. WINOPEN 04 07 31
  31. " The Directory:           "
  32. " ~1~2                     "
  33. " already exists and       "
  34. " contains other files!    "
  35. "                          "
  36. " Are you sure you want to "
  37. " use this directory ?     "
  38. "                          "
  39. "          Y or N          "
  40. ASK +12 +09
  41. WINCLOSE
  42. JUMP.NO PROMPT
  43. :UNPACK
  44. UNPACK HSS.PAK 04 07 31 04 13 79
  45. JUMP.FAIL INSTALL_FAILURE
  46. SET.FILES 51
  47. EXIST ~3\HSS60.BAT
  48. JUMP.NO SKIP_DELETE
  49. PROMPT OFF
  50. DELETE ~3\HSS60.BAT 04 22 17
  51. :SKIP_DELETE
  52. DOS 3.3
  53. JUMP.NO OLD_DOS
  54. FILE ~3\HSS60.BAT
  55. "@~1"
  56. "@cd ~2"
  57. "@hss.exe"
  58. "@~3"
  59. "@cd \"
  60. JUMP DONE
  61. :OLD_DOS
  62. FILE ~3\HSS60.BAT
  63. "~1"
  64. "cd ~2"
  65. "hss.exe"
  66. "~3"
  67. "cd \"
  68. :DONE
  69. WINOPEN 04 07 31
  70. " The Home Sales System    "
  71. " Software has been        "
  72. " successfully installed.  "
  73. "                          "
  74. " To run it, enter the     "
  75. " command 'HSS60' from the "
  76. " root directory of drive  "
  77. " ~3.                      "
  78. "                          "
  79. " Thank you for selecting  "
  80. " Grumpyware (r) Software! "
  81. "                          "
  82. " Press the [Enter] key to "
  83. " continue.                "
  84. WAIT 00 23
  85. WINCLOSE
  86. WINOPEN 04 07 31
  87. "Would you like to see the "
  88. "README.1ST file ?         "
  89. ""
  90. "          Y or N          "
  91. ASK +12 +04
  92. WINCLOSE
  93. JUMP.NO PRINT_README.1ST
  94. VIEW ~1~2\README.1ST 31 07
  95. :PRINT_README.1ST
  96. WINOPEN 04 07 31
  97. "Would you like to PRINT   "
  98. "the README.1ST file ?     "
  99. ""
  100. "          Y or N          "
  101. ASK +12 +04
  102. WINCLOSE
  103. JUMP.NO RUN_ASK
  104. WINOPEN 04 07 79
  105. ""
  106. "  Printing ...            "
  107. ""
  108. PRINT ~1~2\README.1ST
  109. WINCLOSE
  110. JUMP.FAIL PRINTER_ERROR
  111. JUMP RUN_ASK
  112. :PRINTER_ERROR
  113. WINOPEN 04 07 79
  114. "Your printer is not       "
  115. "responding. Possible print"
  116. "problems:                 "
  117. " Printer is not turned on."
  118. " Printer is out of paper  "
  119. " Printer is not attached  "
  120. " to LPT1 (parallel port 1)"
  121. ""
  122. "Do you want to try to     "
  123. "print again ?             "
  124. ""
  125. "          Y or N          "
  126. ASK +12 +12
  127. WINCLOSE
  128. JUMP.YES PRINT_README.1ST
  129. JUMP.NO RUN_ASK
  130. :RUN_ASK
  131. WINOPEN 04 07 31
  132. " Would you like to run    "
  133. " The Home Sales System    "
  134. " right now ?              "
  135. ""
  136. ""
  137. "          Y or N          "
  138. ASK +12 +06
  139. JUMP.NO EXIT
  140. RUN ~3\HSS60.BAT
  141. :EXIT
  142. END
  143. :INSTALL_FAILURE
  144. SCRIPT ~0\INST3.FIL
  145.